(askdir (prompt "Bitte geben Sie den Pfad an, in dem UpToDate die Schublade erzeugt werden soll.")
(help (cat "In diesem Einstellungsfenster können Sie den Pfad eingeben, in dem UpToDate \
installiert werden soll.\nSie können sowohl das von Ihnen gewünschte Laufwerk, als auch die Schublade angeben, in der das Programm gespeichert werden soll.\n\nHinweis: Es \
wird eine eigene Schublade für das Programm angelegt!\n\n" @askdir-help))
(default @default-dest)
)
)
(set fulldest (tackon newdest "UpToDate"))
(set @default-dest fulldest)
(makedir
(fulldest)
(prompt "Lege Verzeichnis an...")
(help @makedir-help)
(infos)
)
(copylib
(prompt "Copying/Updating CanDo.Library\nThis library is needed for some additional programs of UTD.")
(help
"Die CanDo.library wird zum Start von UpToDate benötigt.\n"